home *** CD-ROM | disk | FTP | other *** search
-
- #include <windows.h>
- #include "querysib.h"
- #include "commctrl.h"
-
-
- #if defined (WIN32)
- #define IS_WIN32 TRUE
- #else
- #define IS_WIN32 FALSE
- #endif
-
- #define IS_NT IS_WIN32 && (BOOL)(GetVersion() < 0x80000000)
- #define IS_WIN32S IS_WIN32 && (BOOL)(!(IS_NT) && (LOBYTE(LOWORD(GetVersion()))<4))
- #define IS_WIN95 (BOOL)(!(IS_NT) && !(IS_WIN32S)) && IS_WIN32
-
- HINSTANCE hInst; // current instance
-
- LPCTSTR lpszAppName = "MyApp";
- LPCTSTR lpszTitle = "PropSheet_QuerySiblings";
-
-
- BOOL RegisterWin95( CONST WNDCLASS* lpwc );
-
-
- int APIENTRY WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance,
- LPTSTR lpCmdLine, int nCmdShow)
- {
- MSG msg;
- HWND hWnd;
- WNDCLASS wc;
-
- wc.style = CS_HREDRAW | CS_VREDRAW;
- wc.lpfnWndProc = (WNDPROC)WndProc;
- wc.cbClsExtra = 0;
- wc.cbWndExtra = 0;
- wc.hInstance = hInstance;
- wc.hIcon = LoadIcon (hInstance, lpszAppName);
- wc.hCursor = LoadCursor(NULL, IDC_ARROW);
- wc.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
- wc.lpszMenuName = lpszAppName;
- wc.lpszClassName = lpszAppName;
-
- if ( IS_WIN95 )
- {
- if ( !RegisterWin95( &wc ) )
- return( FALSE );
- }
- else if ( !RegisterClass( &wc ) )
- return( FALSE );
-
- hInst = hInstance;
-
- hWnd = CreateWindow( lpszAppName,
- lpszTitle,
- WS_OVERLAPPEDWINDOW,
- CW_USEDEFAULT, 0,
- CW_USEDEFAULT, 0,
- NULL,
- NULL,
- hInstance,
- NULL
- );
-
- if ( !hWnd )
- return( FALSE );
-
- ShowWindow( hWnd, nCmdShow );
- UpdateWindow( hWnd );
-
- while( GetMessage( &msg, NULL, 0, 0) )
- {
- TranslateMessage( &msg );
- DispatchMessage( &msg );
- }
-
- return( msg.wParam );
- }
-
-
- BOOL RegisterWin95( CONST WNDCLASS* lpwc )
- {
- WNDCLASSEX wcex;
-
- wcex.style = lpwc->style;
- wcex.lpfnWndProc = lpwc->lpfnWndProc;
- wcex.cbClsExtra = lpwc->cbClsExtra;
- wcex.cbWndExtra = lpwc->cbWndExtra;
- wcex.hInstance = lpwc->hInstance;
- wcex.hIcon = lpwc->hIcon;
- wcex.hCursor = lpwc->hCursor;
- wcex.hbrBackground = lpwc->hbrBackground;
- wcex.lpszMenuName = lpwc->lpszMenuName;
- wcex.lpszClassName = lpwc->lpszClassName;
-
- // Added elements for Windows 95.
- //...............................
- wcex.cbSize = sizeof(WNDCLASSEX);
- wcex.hIconSm = LoadImage(wcex.hInstance, lpwc->lpszClassName,
- IMAGE_ICON, 16, 16,
- LR_DEFAULTCOLOR );
-
- return RegisterClassEx( &wcex );
- }
-
-
- LRESULT CALLBACK EditProc( HWND hDlg, UINT message,
- WPARAM wParam, LPARAM lParam )
- {
- switch (message)
- {
- case WM_INITDIALOG:
- return (TRUE);
-
- case WM_COMMAND :
- switch( LOWORD( wParam ) )
- {
- case IDC_EDIT1 :
- case IDC_EDIT2 :
- case IDC_EDIT3 :
- if ( HIWORD( wParam ) == EN_CHANGE )
- {
- if ( PropSheet_QuerySiblings( GetParent( hDlg ), 0, 0 ) )
- PropSheet_Changed( GetParent( hDlg ), hDlg );
- }
- break;
- }
- break;
-
- case WM_NOTIFY :
- if ( ((NMHDR*)lParam)->code == PSN_APPLY )
- {
- // Apply changes.
-
- // Gray out the Apply.
- //....................
- PropSheet_UnChanged( GetParent( hDlg ), hDlg );
- }
- break;
- }
-
- return( FALSE );
- }
-
-
- LRESULT CALLBACK CheckProc( HWND hDlg, UINT message,
- WPARAM wParam, LPARAM lParam )
- {
- switch (message)
- {
- case WM_INITDIALOG:
- return (TRUE);
-
- case PSM_QUERYSIBLINGS :
- if ( IsDlgButtonChecked( hDlg, IDC_CHECK1 ) ||
- IsDlgButtonChecked( hDlg, IDC_CHECK2 ) )
- {
- SetWindowLong( hDlg, DWL_MSGRESULT, TRUE );
- return( TRUE );
- }
- break;
- }
-
- return( FALSE );
- }
-
-
- LRESULT CALLBACK RadioProc( HWND hDlg, UINT message,
- WPARAM wParam, LPARAM lParam )
- {
- switch (message)
- {
- case WM_INITDIALOG:
- return (TRUE);
-
- case PSM_QUERYSIBLINGS :
- if ( IsDlgButtonChecked( hDlg, IDC_RADIO1 ) ||
- IsDlgButtonChecked( hDlg, IDC_RADIO2 ) ||
- IsDlgButtonChecked( hDlg, IDC_RADIO3 ) )
- {
- SetWindowLong( hDlg, DWL_MSGRESULT, TRUE );
- return( TRUE );
- }
- break;
- }
-
- return( FALSE );
- }
-
-
- VOID DisplayProperties( HWND hWnd )
- {
- PROPSHEETPAGE psp;
- PROPSHEETHEADER psh;
- HPROPSHEETPAGE hpsp[3];
-
- psp.dwSize = sizeof( PROPSHEETPAGE );
- psp.dwFlags = PSP_DEFAULT;
- psp.hInstance = hInst;
- psp.pszTemplate = "EDITPAGE";
- psp.pfnDlgProc = (DLGPROC)EditProc;
- hpsp[0] = CreatePropertySheetPage( &psp );
-
- psp.pszTemplate = "CHECKPAGE";
- psp.pfnDlgProc = (DLGPROC)CheckProc;
- hpsp[1] = CreatePropertySheetPage( &psp );
-
- psp.pszTemplate = "RADIOPAGE";
- psp.pfnDlgProc = (DLGPROC)RadioProc;
- hpsp[2] = CreatePropertySheetPage( &psp );
-
- memset( &psh, 0, sizeof( PROPSHEETHEADER ) );
- psh.dwSize = sizeof( PROPSHEETHEADER );
- psh.dwFlags = PSH_USEICONID;
- psh.hInstance = hInst;
- psh.hwndParent = hWnd;
- psh.pszIcon = "SMALL";
- psh.nPages = 3;
- psh.phpage = hpsp;
- psh.pszCaption = "Properties";
-
- PropertySheet( &psh );
- }
-
-
- LRESULT CALLBACK WndProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam )
- {
- switch( uMsg )
- {
- case WM_CREATE :
- InitCommonControls();
- break;
-
- case WM_COMMAND :
- switch( LOWORD( wParam ) )
- {
- case IDM_TEST :
- DisplayProperties( hWnd );
- break;
-
- case IDM_ABOUT :
- DialogBox( hInst, "AboutBox", hWnd, (DLGPROC)About );
- break;
-
- case IDM_EXIT :
- DestroyWindow( hWnd );
- break;
- }
- break;
-
- case WM_DESTROY :
- PostQuitMessage(0);
- break;
-
- default :
- return( DefWindowProc( hWnd, uMsg, wParam, lParam ) );
- }
-
- return( 0L );
- }
-
-
- LRESULT CALLBACK About( HWND hDlg,
- UINT message,
- WPARAM wParam,
- LPARAM lParam)
- {
- switch (message)
- {
- case WM_INITDIALOG:
- return (TRUE);
-
- case WM_COMMAND:
- if ( LOWORD(wParam) == IDOK
- || LOWORD(wParam) == IDCANCEL)
- {
- EndDialog(hDlg, TRUE);
- return (TRUE);
- }
- break;
- }
-
- return (FALSE);
- }
-